home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The 640 MEG Shareware Studio 2
/
The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO
/
dbase
/
bbsintro.exe
/
START.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-01-25
|
1KB
|
85 lines
echo off
if exist menu.txt goto default
a:
:default
cls
type menu.txt
:loop
check KEYPRESS
REM Note the following must be in DESCENDING order of ASCII code.
IF ERRORLEVEL 56 GOTO loop
IF ERRORLEVEL 55 GOTO pressed7
IF ERRORLEVEL 54 GOTO pressed6
IF ERRORLEVEL 53 GOTO pressed5
IF ERRORLEVEL 52 GOTO pressed4
IF ERRORLEVEL 51 GOTO pressed3
IF ERRORLEVEL 50 GOTO pressed2
IF ERRORLEVEL 49 GOTO pressed1
IF ERRORLEVEL 28 GOTO loop
IF ERRORLEVEL 27 GOTO quit
goto loop
:pressed1
list readme.1st
goto default
:pressed2
list oas.txt
goto default
:pressed3
list start.txt
goto default
:pressed4
list abbl*.txt
goto default
:pressed5
list member.app
goto default
:pressed6
cls
echo
Echo Make sure your printer is turned on and ready to go.
Echo You will need approximately nine or ten Letter-sized pages
Echo to print on.
echo
echo Press P to print, any other key to return to menu....
check KEYPRESS
IF ERRORLEVEL 112 goto print
IF ERRORLEVEL 80 goto print
goto default
:print
type readme.1st >PRN
echo >PRN
type oas.txt >PRN
echo >PRN
type start.txt >PRN
echo >PRN
copy abbl*.txt PRN: >NUL
echo >PRN
copy member.app >prn
echo >PRN
goto default
:pressed7
echo NOW LOADING COMM PROGRAM, PLEASE STAND BY....
commo
goto default
:quit